openPrivTextButton( "button_ID",origL,origT,$wide_button,$hight_button,5,96,"text in chat window","Text in button",$max_lenght_of_input,Goto_this_Sub );
Sub Goto_this_Sub( $myVar )
privMsg( "$myVar = " . $myVar );
EndSub
CASE "!login":
IF( UserInGroup( "admin",$userName ) == 1 || UserInGroup( "tempadmin",$userName ) == 1)
THEN
privMsg( "^2You are already logged in");
BREAK;
ENDIF
IF( $argv == 1234 )
THEN
privMsg( "^2Thank you for logging in");
MoveUserToGroup( "tempadmin",$userName );
ELSE
privMsg( "^1Login Denied");
ENDIF
BREAK;
CASE "!logout":
IF( UserInGroup( "admin",$userName ) == 1 || UserInGroup( "tempadmin",$userName ) == 1)
THEN
RemoveUserFromGroup( "tempadmin",$userName );
privMsg( "^2You are logged out now.");
ELSE
privMsg( "^2You where not logged in.");
ENDIF
BREAK;
CASE "!rst":
IF( UserInGroup( "admin",$userName ) == 1 || UserInGroup( "tempadmin",$userName ) == 1) THEN
cmdLFS( "/restart " );
ENDIF
BREAK;
CASE "!auth":
privMsg( langEngine( "%{main_level}%", GetCurrentPlayerVar("AuthLevel") ) );
BREAK;
CASE "!login":
IF( UserInGroup( "tempadmin",$userName ) == 1 )
THEN
privMsg( "^2You are already logged in");
BREAK;
ENDIF
IF( $argv == 1234 )
THEN
privMsg( "^2Thank you for logging in");
MoveUserToGroup( "tempadmin",$userName );
ELSE
privMsg( "^1Login Denied");
ENDIF
BREAK;
CASE "!logout":
IF( UserInGroup( "tempadmin",$userName ) == 1 )
THEN
RemoveUserFromGroup( "tempadmin",$userName );
privMsg( "^2You are logged out now.");
ELSE
privMsg( "^2You where not logged in.");
ENDIF
BREAK;
# Configuration of LFSServer to be Managed with LFSLapper
# One line per server
# Remote port is the port used to manage LFSLapper remotely, future extension
# One remote port per LFSLapper on one machine, autoStart is optionnal
#Unique ID|GroupId|Ip|Port|WorkDir|IniFile|autoStart
remotePort=3001;
SVR1|gr1|127.0.0.1|29991|./default|S2_GTR.ini|autowork
SVR2|gr1|127.0.0.1|29992|./default|Demo_bronze.ini|autowork
SVR3|gr1|127.0.0.1|29993|./default|Demo_copper.ini|autowork
SVR4|gr1|127.0.0.1|29994|./default|S2_FBM.ini|autowork
SVR5|gr1|127.0.0.1|29995|./default|S2_Test.ini|autoStart
GlobalVar $TeamTag;
$TeamTag = "^0[^4S^0C]"; # Put here a team Tag that you want to check
GlobalVar $TeamTagLenght;
GlobalVar $TeamTagStrip;
$TeamTagLenght = StrLen( $TeamTag );
$NickName = GetCurrentPlayerVar("NickName");
$TeamTagStrip = substr( $NickName,0,$TeamTagLenght );
IF( $TeamTagStrip == $TeamTag )
THEN
do something ( kick or allow )
ENDIF
Event OnConnect() # Player event
$Username = GetCurrentPlayerVar("Username");
UserGroupFromFile( "notwelcome", "./notwelcome.txt" );
IF( UserInGroup( "notwelcome",$Username ) == 1 )
THEN
cmdLFS( "/ban " . $Username . " 99" );
ENDIF
SWITCH( GetCurrentPlayerVar("[COLOR=orange]FinishedPos[/COLOR]") ) [COLOR=blue]# you can use any var here[/COLOR]
CASE 1: [COLOR=blue]# 1 is the value of GetCurrentPlayerVar("[COLOR=orange]FinishedPos[/COLOR]")[/COLOR]
[COLOR=seagreen]do something[/COLOR]
BREAK;
CASE 2:
[COLOR=seagreen]do something[/COLOR]
BREAK;
CASE 3:
[COLOR=seagreen]do something[/COLOR]
BREAK;
DEFAULT: [COLOR=blue]# If no value match then do this[/COLOR]
[COLOR=seagreen]do something else[/COLOR]
BREAK;
ENDSWITCH
Event OnResult( $flagConfirm )
$WinnerName = GetCurrentPlayerVar("NickName");
SWITCH( GetCurrentPlayerVar("FinishedPos") )
CASE 1:
IF(( $flagConfirm == 2 )||( $flagConfirm == 18 )||( $flagConfirm == 34 ))
THEN
openGlobalButton( "winner_backing",66,136,74,34,3,10,32," ");
openGlobalButton( "number_1",67,137,10,32,3,10,16,"^01");
openGlobalButton( "winner_title",78,137,62,19,4,10,96,langEngine( "%{main_winnertitle}%" ));
openGlobalButton( "winner_name",78,156,58,12,3,10,64,langEngine( "%{main_winnername}%",$WinnerName));
openGlobalButton( "white_banner1",108,137,32,18,1,10,16," ");
openGlobalButton( "white_banner2",108,137,32,18,1,10,16," ");
openGlobalButton( "white_banner3",108,137,32,18,1,10,16," ");
openGlobalButton( "black_banner1",136,137,4,6,1,10,32," ");
openGlobalButton( "black_banner2",136,137,4,6,1,10,32," ");
openGlobalButton( "black_banner3",136,137,4,6,1,10,32," ");
openGlobalButton( "black_banner4",112,137,4,6,1,10,32," ");
openGlobalButton( "black_banner5",112,137,4,6,1,10,32," ");
openGlobalButton( "black_banner6",112,137,4,6,1,10,32," ");
openGlobalButton( "black_banner7",120,137,4,6,1,10,32," ");
openGlobalButton( "black_banner8",120,137,4,6,1,10,32," ");
openGlobalButton( "black_banner9",120,137,4,6,1,10,32," ");
openGlobalButton( "black_banner10",128,137,4,6,1,10,32," ");
openGlobalButton( "black_banner11",128,137,4,6,1,10,32," ");
openGlobalButton( "black_banner12",128,137,4,6,1,10,32," ");
openGlobalButton( "black_bannera",108,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerb",108,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerc",108,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerd",116,143,4,6,1,10,32," ");
openGlobalButton( "black_bannere",116,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerf",116,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerg",124,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerh",124,143,4,6,1,10,32," ");
openGlobalButton( "black_banneri",124,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerj",132,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerk",132,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerl",132,143,4,6,1,10,32," ");
openGlobalButton( "black_bannera1",136,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera2",136,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera3",136,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera4",112,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera5",112,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera6",112,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera7",120,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera8",120,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera9",120,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera10",128,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera11",128,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera12",128,149,4,6,1,10,32," ");
ENDIF
BREAK;
ENDSWITCH
EndEvent
Event OnResult( $flagConfirm )
SWITCH( GetCurrentPlayerVar("FinishedPos") )
CASE 1:
IF(( $flagConfirm == 2 )||( $flagConfirm == 18 )||( $flagConfirm == 34 ))
THEN
openGlobalButton( "winner_backing",66,136,74,34,3,10,32," ");
openGlobalButton( "number_1",67,137,10,32,3,10,16,"^01");
openGlobalButton( "winner_title",78,137,62,19,4,10,96,langEngine( "%{main_winnertitle}%" ));
openGlobalButton( "winner_name",78,156,58,12,3,10,64,langEngine( "%{main_winnername}%",$WinnerName));
openGlobalButton( "white_banner1",108,137,32,18,1,10,16," ");
openGlobalButton( "white_banner2",108,137,32,18,1,10,16," ");
openGlobalButton( "white_banner3",108,137,32,18,1,10,16," ");
openGlobalButton( "black_banner1",136,137,4,6,1,10,32," ");
openGlobalButton( "black_banner2",136,137,4,6,1,10,32," ");
openGlobalButton( "black_banner3",136,137,4,6,1,10,32," ");
openGlobalButton( "black_banner4",112,137,4,6,1,10,32," ");
openGlobalButton( "black_banner5",112,137,4,6,1,10,32," ");
openGlobalButton( "black_banner6",112,137,4,6,1,10,32," ");
openGlobalButton( "black_banner7",120,137,4,6,1,10,32," ");
openGlobalButton( "black_banner8",120,137,4,6,1,10,32," ");
openGlobalButton( "black_banner9",120,137,4,6,1,10,32," ");
openGlobalButton( "black_banner10",128,137,4,6,1,10,32," ");
openGlobalButton( "black_banner11",128,137,4,6,1,10,32," ");
openGlobalButton( "black_banner12",128,137,4,6,1,10,32," ");
openGlobalButton( "black_bannera",108,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerb",108,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerc",108,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerd",116,143,4,6,1,10,32," ");
openGlobalButton( "black_bannere",116,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerf",116,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerg",124,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerh",124,143,4,6,1,10,32," ");
openGlobalButton( "black_banneri",124,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerj",132,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerk",132,143,4,6,1,10,32," ");
openGlobalButton( "black_bannerl",132,143,4,6,1,10,32," ");
openGlobalButton( "black_bannera1",136,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera2",136,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera3",136,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera4",112,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera5",112,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera6",112,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera7",120,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera8",120,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera9",120,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera10",128,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera11",128,149,4,6,1,10,32," ");
openGlobalButton( "black_bannera12",128,149,4,6,1,10,32," ");
ENDIF
BREAK;
DEFAULT:
BREAK;
ENDSWITCH
EndEvent
CASE "!ver":
IF( UserInGroup( "beta",$userName ) == 1 )
THEN
openPrivButton( "ver",35,28,125,10,5,-1,0,"^6Lapper Version Information" );
openPrivButton( "ver2"[COLOR=red],[/COLOR]35,38,125,6,5,-1,32,"^2this server is running ^0[^4S^0C] ^7Lapper version " . $VNB . $VSB
. "&^2made by ^0[^4S^0C] ^7T3ChaRmy"
. "&^2Score Board made by ^7[TT^1R^7] Ken Nomura"
. "&^2based off of ^6Gai-Luron's ^2LFSlapper"
. "&Click To Close!",MA_closever );
ELSE
openPrivButton( "ver",35,28,125,10,5,-1,0,"^6Lapper Version Information" );
openPrivButton( "ver2"[COLOR=red],[/COLOR]35,38,125,6,5,-1,32,"^2this server is running ^0[^4S^0C] ^7Lapper version " . $VN . $VS
. "&^2made by ^0[^4S^0C] ^7T3ChaRmy"
. "&^2Score Board made by ^7[TT^1R^7] Ken Nomura"
. "&^2based off of ^6Gai-Luron's ^2LFSlapper"
. "&Click To Close!",MA_closever );
ENDIF
SWITCH( $your_var)
CASE "!help": #is the value of $your_var
openPrivButton( "help"......
openPrivButton( "help2"......
openPrivButton( "close".......
BREAK;
ENDSWITCH
CASE "!help":
OnClickHelp(0,0);
BREAK;
.
.
.
openGlobalButton( "easyklikhelp",139,1,7,4,2,-1,32,langEngine( "%{main_easyklikhelp}%" ),OnClickHelp );
Sub OnClickHelp( $KeyFlags,$id )
openPrivButton( "help"......
openPrivButton( "help2"......
openPrivButton( "close".......
EndSub
### SET THE FOLLOWING VAR'S TO SETUP YOUR SERVER WHEN LFSLAPPER (RE)START ####
[COLOR=royalblue] $GUI_Lap_hour_number = 5 ;[/COLOR] #Number of race laps
[COLOR=royalblue]$GUI_qual = 10 ;[/COLOR] #Number of qual minutes
$GUI_wind = 0 ; #0=no wind 1=low wind 2=hard wind
$GUI_weather = 1 ; #set type of wheather 0,1 or 2
$GUI_mustpit = "no" ; #need to pit yes or no
$GUI_fcv = "no" ; #Force cockpit view yes or no
$GUI_drift = "no" ; #Drift option yes or no ( see the part at end of this script)
$GUI_midrace = "yes" ; #Join midrace yes or no
$GUI_start = "finish" ; #Race start order : fixed/finish/reverse/random
$GUI_current_car = "?" ; #You can set here the default car. If not set,the first time when the config GUI start its show's a "?".
### END ###